|
| Run file for !CaretChs
|
Set CaretChase$Dir <Obey$Dir>
IconSprites <CaretChase$Dir>.!Sprites
Set CaretChase$Help <CaretChase$Dir>.!Help
Set CaretChase$Version "1.00"
Set CaretChase$Web "http://www.snowstone.org.uk/riscos/"
Set CaretChase$Title "CaretChase"
Set CaretChase$Publisher "Adam Richardson"
Set CaretChase$Description "A simple program which makes the pointer follow the caret, when you're typing."

|Check if AcornURI is present, try to load it, if it's still
|not there set a variable to use in !RunImage
Set CaretChase$AcornURITest "Present"
RMEnsure AcornURI 0.12 IfThere System:Modules.Network.URI Then Filer_Run System:Modules.Network.URI
RMEnsure AcornURI 0.12 UnSet CaretChase$AcornURITest

|Check the prescent or otherwise of SysLog. Set a system variable
|accordingly for use in !RunImage
Set CaretChase$SysLogTest "Present"
If "<SysLog$Dir>" = "" Then Unset CaretChase$SysLogTest
If "<CaretChase$SysLogTest>" = "Present" Then RMEnsure SysLog 0.01 Run <SysLog$Dir>.!Run
RMEnSure SysLog 0.01 Unset CaretChase$SysLogTest

WimpSlot -min 64K -max 64K
Run <CaretChase$Dir>.!RunImage

Unset CaretChase$AcornURITest
Unset CaretChase$SysLogTest